home *** CD-ROM | disk | FTP | other *** search
/ Softdisk Supreme / Softdisk Supreme.iso / pc / DSK Files / 0-49 / SD018c.dsk / PAL.93436.PENNOCK.MAR.83.B.bas < prev    next >
BASIC Source File  |  2003-06-12  |  2KB  |  18 lines

  1. 10  REM    SOFTPAL 3/83
  2. 20 D$ =  CHR$(13) + CHR$(4): HOME : TEXT : GOTO 100
  3. 30 A = (40 - LEN(A$))/2: HTAB A: PRINT A$: RETURN 
  4. 40  VTAB 23:A$ = "PRESS ANY KEY TO CONTINUE": GOSUB 30: VTAB 23:A =  PEEK( -16384): IF A <128 GOTO 40
  5. 50  POKE ( -16368),0: HOME : VTAB 1: RETURN 
  6. 100 A$ = "NEW IMPROVED OKIDATA 92": VTAB 1: GOSUB 30
  7. 110  PRINT "AS MOST OF YOU ARE AWARE THE OKIDATA": PRINT "CORPORATION OF MT. LAUREL, N.J. HAS": PRINT "RECENTLY INTRODUCED THEIR NEW MICROLINE"
  8. 120  PRINT  CHR$(34)"9X" CHR$(34)" SERIES OF PRINTERS. THESE FINE DOT": PRINT "MATRIX PRINTERS ARE PRICED IN THE LOW-": PRINT "MID RANGE. SUGGESTED LIST ON THE MICRO-": PRINT "LINE 92 IS $699.00 WITH MANY DEALERS"
  9. 130  PRINT "ASKING CONSIDERABLY LESS. I PURCHASED A": PRINT "'92 ABOUT A MONTH AGO AND HAVE HAD AMPLE": PRINT "OPPORTUNITY TO SHAKE IT DOWN. I HAVE": PRINT "BEEN USING IT WITH SIERRA ON-LINE COM-"
  10. 140  PRINT "PUTING'S SCREENWRITER ][ WORD PROCESSOR": PRINT "WITH EXCELLENT RESULTS AND I FEEL QUITE": PRINT "AT HOME WITH THE COMBO.": PRINT : PRINT "THE PRINTER HAS MANY FINE ATTRIBUTES:": PRINT "A FAST 160 CPS DATA PROCESSING MODE;": GOSUB 40
  11. 150  PRINT "A REAL ";: INVERSE : PRINT "NEAT";: NORMAL : PRINT " CORRESPONDENCE MODE; BOTH": PRINT "ENHANCED AND EMPHASIZED PRINTING; VER-": PRINT "TICAL FORMATTING (WITH TRACTOR OPTION);": PRINT "CONTINIOUS UNDERLINING; SUPER AND SUB-"
  12. 160  PRINT "SCRIPTING CAPABILITY; DOWN LOADABLE FONT": PRINT "TRANSFER FROM COMPUTER MEMORY TO THE": PRINT "PRINTER MEMORY FOR PERSONALIZED PRINT": PRINT "STYLES; TEN CANNED FONTS (9 LANGUAGES);": PRINT "PROPORTIONAL SPACING; INTEGRAL GRAPHICS"
  13. 170  PRINT "CIRCUITRY;10/12/17 CPI PLUS DOUBLE WIDTH": PRINT "CHARACTER CAPABILITY (6 WIDTH OPTIONS);": PRINT "ALSO 6 OR 8 LPI OPTION.  THIS LIST DOES"
  14. 180  PRINT "NOT INCLUDE ALL THE GOODIES.I'VE HAD AN": PRINT "OKIDATA MICROLINE 80 SINCE EARLY 1980.": PRINT "IT HAS PERFORMED IN AN EXEMPLARY MANNER ": PRINT "WITHOUT AS MUCH AS A HICCUP AND I WAS": PRINT "QUITE PLEASED WITH IT . TECHNICAL INFO"
  15. 190  GOSUB 40: PRINT "EXCHANGE WITH THE TECHNICAL STAFF HAS ": PRINT "BEEN EXCELLENT....PARTICULARLY WITH MR.": PRINT "WALT PAGET OF OKIDATA."
  16. 200  PRINT : PRINT "IF ANYONE IS CONTEMPLATING THE PURCHASE": PRINT "OF ONE OF THESE FINE MACHINES AND HAS": PRINT "ANY QUESTIONS PLEASE FEEL FREE TO CON-": PRINT "TACT ME."
  17. 210  VTAB 14: PRINT "JACK PENNOCK": PRINT "4001 CONSTELLATION ROAD": PRINT "LOMPOC, CA 93436": PRINT "(805) 733-3412 "
  18. 220  GOSUB 40: PRINT D$"RUNPAL.MENU"